Diamonds

Sort

Photo by Edgar Soto on Unsplash

Diamonds

The focus now is on citizen activism, where citizens express themselves in a peaceful and nonviolent way….
— Promise Mkwananzi

Load data

df<-read.csv('./archetypes/diamonds.csv', header = TRUE, stringsAsFactors = FALSE)
set.seed(123)
index <- sample(1:nrow(df), 100)
df_1<-df[index,]%>%
  select(carat, cut, color,clarity,price)
row.names(df_1)<-NULL

carat	cut	color	clarity	price
0.73	Ideal	I	VS1	2397
0.70	Ideal	G	VS1	3300
0.31	Ideal	D	VS1	713
0.31	Ideal	H	VVS1	707
0.31	Ideal	E	IF	987
0.83	Good	E	SI1	3250
0.51	Very Good	D	VS2	1668
0.70	Good	H	SI1	1771
0.40	Ideal	E	VS1	1053
1.10	Very Good	I	SI1	4640
0.52	Premium	E	VVS2	2467
0.32	Ideal	D	VS2	758
1.00	Very Good	D	SI1	5755
1.01	Good	F	VS2	6097
2.01	Very Good	I	VS2	17422
1.60	Premium	F	SI1	12343
1.01	Premium	I	SI1	4525
0.31	Ideal	D	VS2	734
0.38	Very Good	F	VS2	685
1.03	Premium	I	SI1	4326
1.31	Ideal	I	SI2	5546
0.70	Very Good	F	SI1	2100
2.01	Very Good	H	SI2	12829
0.80	Very Good	G	VVS2	4002
1.20	Premium	E	SI1	7274
0.31	Good	E	SI1	698
0.82	Very Good	F	SI2	2643
0.41	Premium	H	SI1	683
0.33	Ideal	E	IF	1207
0.33	Ideal	I	SI2	403
1.30	Premium	H	VS2	5824
0.35	Ideal	G	IF	1116
1.25	Premium	J	SI1	4200
0.62	Ideal	F	SI2	1441
0.30	Ideal	G	VS2	545
0.40	Ideal	E	SI1	673
0.90	Ideal	H	VS1	5013
0.40	Ideal	F	VVS2	1351
0.50	Very Good	E	SI1	1374
1.09	Premium	H	SI1	5219
0.91	Ideal	G	SI2	3985
0.34	Ideal	E	VS2	829
1.66	Premium	J	VVS2	9882
0.42	Premium	F	VS1	1103
1.17	Good	D	SI2	4639
1.27	Very Good	D	SI1	8312
0.90	Premium	G	VS1	4579
1.55	Premium	D	VS2	16137
1.50	Good	D	SI2	9173
1.06	Premium	D	SI1	5817
0.90	Very Good	F	SI1	3950
0.42	Ideal	F	VVS1	1656
0.32	Ideal	H	VS2	534
0.38	Ideal	D	VVS1	1400
0.78	Ideal	F	SI2	2386
0.30	Very Good	F	VVS1	682
2.01	Premium	G	SI2	16733
0.34	Ideal	G	VS2	596
1.31	Premium	H	SI2	6089
0.90	Very Good	E	SI1	3748
0.33	Ideal	E	SI1	532
0.31	Ideal	G	VS1	802
1.22	Ideal	F	SI1	6456
2.15	Ideal	I	SI2	14388
1.27	Premium	J	VVS1	5761
1.06	Very Good	H	VS2	5783
2.00	Premium	H	SI1	11200
2.01	Very Good	J	VS1	12845
0.23	Good	F	VVS1	472
1.16	Ideal	H	SI1	5852
1.01	Very Good	G	VVS2	6975
0.34	Very Good	E	SI1	596
0.55	Ideal	G	VVS1	2042
0.43	Very Good	G	VVS1	1143
0.50	Ideal	J	VS2	875
0.30	Ideal	G	VVS1	1013
1.52	Fair	H	SI1	8818
1.22	Premium	G	SI2	6969
0.30	Ideal	E	VVS2	766
0.50	Good	J	VS2	965
1.26	Ideal	G	VS1	9243
0.41	Ideal	E	VS1	1153
0.31	Very Good	D	VS2	734
0.50	Premium	H	VS1	1395
0.39	Ideal	F	VVS2	988
0.31	Ideal	F	VVS1	840
1.30	Very Good	H	VS1	7747
1.05	Premium	G	SI1	4974
1.06	Ideal	H	VS2	6619
0.51	Very Good	F	VS2	1569
0.52	Ideal	G	VS1	1721
1.52	Very Good	F	VS1	16670
0.31	Premium	G	SI2	523
1.33	Ideal	F	VVS2	15031
0.41	Very Good	E	SI1	953
0.40	Ideal	J	VVS2	662
0.88	Very Good	H	VS2	3472
0.32	Very Good	F	VS2	645
0.70	Ideal	H	SI1	2548
0.53	Ideal	H	VS2	1412

Sort a dataset from a given reference with set order

Here is a reference list for “clarity” based on the modern GIA grading system .

## [1] "IF"   "VVS1" "VVS2" "VS1"  "VS2"  "SI1"  "SI2"  "I1"

Sort the order following the reference list.

df_2<-df_1%>% arrange(factor(clarity, levels = reference))

carat	cut	color	clarity	price
0.31	Ideal	E	IF	987
0.33	Ideal	E	IF	1207
0.35	Ideal	G	IF	1116
0.31	Ideal	H	VVS1	707
0.42	Ideal	F	VVS1	1656
0.38	Ideal	D	VVS1	1400
0.30	Very Good	F	VVS1	682
1.27	Premium	J	VVS1	5761
0.23	Good	F	VVS1	472
0.55	Ideal	G	VVS1	2042
0.43	Very Good	G	VVS1	1143
0.30	Ideal	G	VVS1	1013
0.31	Ideal	F	VVS1	840
0.52	Premium	E	VVS2	2467
0.80	Very Good	G	VVS2	4002
0.40	Ideal	F	VVS2	1351
1.66	Premium	J	VVS2	9882
1.01	Very Good	G	VVS2	6975
0.30	Ideal	E	VVS2	766
0.39	Ideal	F	VVS2	988
1.33	Ideal	F	VVS2	15031
0.40	Ideal	J	VVS2	662
0.73	Ideal	I	VS1	2397
0.70	Ideal	G	VS1	3300
0.31	Ideal	D	VS1	713
0.40	Ideal	E	VS1	1053
0.90	Ideal	H	VS1	5013
0.42	Premium	F	VS1	1103
0.90	Premium	G	VS1	4579
0.31	Ideal	G	VS1	802
2.01	Very Good	J	VS1	12845
1.26	Ideal	G	VS1	9243
0.41	Ideal	E	VS1	1153
0.50	Premium	H	VS1	1395
1.30	Very Good	H	VS1	7747
0.52	Ideal	G	VS1	1721
1.52	Very Good	F	VS1	16670
0.51	Very Good	D	VS2	1668
0.32	Ideal	D	VS2	758
1.01	Good	F	VS2	6097
2.01	Very Good	I	VS2	17422
0.31	Ideal	D	VS2	734
0.38	Very Good	F	VS2	685
1.30	Premium	H	VS2	5824
0.30	Ideal	G	VS2	545
0.34	Ideal	E	VS2	829
1.55	Premium	D	VS2	16137
0.32	Ideal	H	VS2	534
0.34	Ideal	G	VS2	596
1.06	Very Good	H	VS2	5783
0.50	Ideal	J	VS2	875
0.50	Good	J	VS2	965
0.31	Very Good	D	VS2	734
1.06	Ideal	H	VS2	6619
0.51	Very Good	F	VS2	1569
0.88	Very Good	H	VS2	3472
0.32	Very Good	F	VS2	645
0.53	Ideal	H	VS2	1412
0.83	Good	E	SI1	3250
0.70	Good	H	SI1	1771
1.10	Very Good	I	SI1	4640
1.00	Very Good	D	SI1	5755
1.60	Premium	F	SI1	12343
1.01	Premium	I	SI1	4525
1.03	Premium	I	SI1	4326
0.70	Very Good	F	SI1	2100
1.20	Premium	E	SI1	7274
0.31	Good	E	SI1	698
0.41	Premium	H	SI1	683
1.25	Premium	J	SI1	4200
0.40	Ideal	E	SI1	673
0.50	Very Good	E	SI1	1374
1.09	Premium	H	SI1	5219
1.27	Very Good	D	SI1	8312
1.06	Premium	D	SI1	5817
0.90	Very Good	F	SI1	3950
0.90	Very Good	E	SI1	3748
0.33	Ideal	E	SI1	532
1.22	Ideal	F	SI1	6456
2.00	Premium	H	SI1	11200
1.16	Ideal	H	SI1	5852
0.34	Very Good	E	SI1	596
1.52	Fair	H	SI1	8818
1.05	Premium	G	SI1	4974
0.41	Very Good	E	SI1	953
0.70	Ideal	H	SI1	2548
1.31	Ideal	I	SI2	5546
2.01	Very Good	H	SI2	12829
0.82	Very Good	F	SI2	2643
0.33	Ideal	I	SI2	403
0.62	Ideal	F	SI2	1441
0.91	Ideal	G	SI2	3985
1.17	Good	D	SI2	4639
1.50	Good	D	SI2	9173
0.78	Ideal	F	SI2	2386
2.01	Premium	G	SI2	16733
1.31	Premium	H	SI2	6089
2.15	Ideal	I	SI2	14388
1.22	Premium	G	SI2	6969
0.31	Premium	G	SI2	523

Sort a dataset by column ascending

Sort a number column “carat”.

df_3<-df_1%>%arrange(carat)

carat	cut	color	clarity	price
0.23	Good	F	VVS1	472
0.30	Ideal	G	VS2	545
0.30	Very Good	F	VVS1	682
0.30	Ideal	G	VVS1	1013
0.30	Ideal	E	VVS2	766
0.31	Ideal	D	VS1	713
0.31	Ideal	H	VVS1	707
0.31	Ideal	E	IF	987
0.31	Ideal	D	VS2	734
0.31	Good	E	SI1	698
0.31	Ideal	G	VS1	802
0.31	Very Good	D	VS2	734
0.31	Ideal	F	VVS1	840
0.31	Premium	G	SI2	523
0.32	Ideal	D	VS2	758
0.32	Ideal	H	VS2	534
0.32	Very Good	F	VS2	645
0.33	Ideal	E	IF	1207
0.33	Ideal	I	SI2	403
0.33	Ideal	E	SI1	532
0.34	Ideal	E	VS2	829
0.34	Ideal	G	VS2	596
0.34	Very Good	E	SI1	596
0.35	Ideal	G	IF	1116
0.38	Very Good	F	VS2	685
0.38	Ideal	D	VVS1	1400
0.39	Ideal	F	VVS2	988
0.40	Ideal	E	VS1	1053
0.40	Ideal	E	SI1	673
0.40	Ideal	F	VVS2	1351
0.40	Ideal	J	VVS2	662
0.41	Premium	H	SI1	683
0.41	Ideal	E	VS1	1153
0.41	Very Good	E	SI1	953
0.42	Premium	F	VS1	1103
0.42	Ideal	F	VVS1	1656
0.43	Very Good	G	VVS1	1143
0.50	Very Good	E	SI1	1374
0.50	Ideal	J	VS2	875
0.50	Good	J	VS2	965
0.50	Premium	H	VS1	1395
0.51	Very Good	D	VS2	1668
0.51	Very Good	F	VS2	1569
0.52	Premium	E	VVS2	2467
0.52	Ideal	G	VS1	1721
0.53	Ideal	H	VS2	1412
0.55	Ideal	G	VVS1	2042
0.62	Ideal	F	SI2	1441
0.70	Ideal	G	VS1	3300
0.70	Good	H	SI1	1771
0.70	Very Good	F	SI1	2100
0.70	Ideal	H	SI1	2548
0.73	Ideal	I	VS1	2397
0.78	Ideal	F	SI2	2386
0.80	Very Good	G	VVS2	4002
0.82	Very Good	F	SI2	2643
0.83	Good	E	SI1	3250
0.88	Very Good	H	VS2	3472
0.90	Ideal	H	VS1	5013
0.90	Premium	G	VS1	4579
0.90	Very Good	F	SI1	3950
0.90	Very Good	E	SI1	3748
0.91	Ideal	G	SI2	3985
1.00	Very Good	D	SI1	5755
1.01	Good	F	VS2	6097
1.01	Premium	I	SI1	4525
1.01	Very Good	G	VVS2	6975
1.03	Premium	I	SI1	4326
1.05	Premium	G	SI1	4974
1.06	Premium	D	SI1	5817
1.06	Very Good	H	VS2	5783
1.06	Ideal	H	VS2	6619
1.09	Premium	H	SI1	5219
1.10	Very Good	I	SI1	4640
1.16	Ideal	H	SI1	5852
1.17	Good	D	SI2	4639
1.20	Premium	E	SI1	7274
1.22	Ideal	F	SI1	6456
1.22	Premium	G	SI2	6969
1.25	Premium	J	SI1	4200
1.26	Ideal	G	VS1	9243
1.27	Very Good	D	SI1	8312
1.27	Premium	J	VVS1	5761
1.30	Premium	H	VS2	5824
1.30	Very Good	H	VS1	7747
1.31	Ideal	I	SI2	5546
1.31	Premium	H	SI2	6089
1.33	Ideal	F	VVS2	15031
1.50	Good	D	SI2	9173
1.52	Fair	H	SI1	8818
1.52	Very Good	F	VS1	16670
1.55	Premium	D	VS2	16137
1.60	Premium	F	SI1	12343
1.66	Premium	J	VVS2	9882
2.00	Premium	H	SI1	11200
2.01	Very Good	I	VS2	17422
2.01	Very Good	H	SI2	12829
2.01	Premium	G	SI2	16733
2.01	Very Good	J	VS1	12845
2.15	Ideal	I	SI2	14388

Sort a string column “cut”.

df_4 <- df_1 %>% arrange(cut)

carat	cut	color	clarity	price
1.52	Fair	H	SI1	8818
0.83	Good	E	SI1	3250
0.70	Good	H	SI1	1771
1.01	Good	F	VS2	6097
0.31	Good	E	SI1	698
1.17	Good	D	SI2	4639
1.50	Good	D	SI2	9173
0.23	Good	F	VVS1	472
0.50	Good	J	VS2	965
0.73	Ideal	I	VS1	2397
0.70	Ideal	G	VS1	3300
0.31	Ideal	D	VS1	713
0.31	Ideal	H	VVS1	707
0.31	Ideal	E	IF	987
0.40	Ideal	E	VS1	1053
0.32	Ideal	D	VS2	758
0.31	Ideal	D	VS2	734
1.31	Ideal	I	SI2	5546
0.33	Ideal	E	IF	1207
0.33	Ideal	I	SI2	403
0.35	Ideal	G	IF	1116
0.62	Ideal	F	SI2	1441
0.30	Ideal	G	VS2	545
0.40	Ideal	E	SI1	673
0.90	Ideal	H	VS1	5013
0.40	Ideal	F	VVS2	1351
0.91	Ideal	G	SI2	3985
0.34	Ideal	E	VS2	829
0.42	Ideal	F	VVS1	1656
0.32	Ideal	H	VS2	534
0.38	Ideal	D	VVS1	1400
0.78	Ideal	F	SI2	2386
0.34	Ideal	G	VS2	596
0.33	Ideal	E	SI1	532
0.31	Ideal	G	VS1	802
1.22	Ideal	F	SI1	6456
2.15	Ideal	I	SI2	14388
1.16	Ideal	H	SI1	5852
0.55	Ideal	G	VVS1	2042
0.50	Ideal	J	VS2	875
0.30	Ideal	G	VVS1	1013
0.30	Ideal	E	VVS2	766
1.26	Ideal	G	VS1	9243
0.41	Ideal	E	VS1	1153
0.39	Ideal	F	VVS2	988
0.31	Ideal	F	VVS1	840
1.06	Ideal	H	VS2	6619
0.52	Ideal	G	VS1	1721
1.33	Ideal	F	VVS2	15031
0.40	Ideal	J	VVS2	662
0.70	Ideal	H	SI1	2548
0.53	Ideal	H	VS2	1412
0.52	Premium	E	VVS2	2467
1.60	Premium	F	SI1	12343
1.01	Premium	I	SI1	4525
1.03	Premium	I	SI1	4326
1.20	Premium	E	SI1	7274
0.41	Premium	H	SI1	683
1.30	Premium	H	VS2	5824
1.25	Premium	J	SI1	4200
1.09	Premium	H	SI1	5219
1.66	Premium	J	VVS2	9882
0.42	Premium	F	VS1	1103
0.90	Premium	G	VS1	4579
1.55	Premium	D	VS2	16137
1.06	Premium	D	SI1	5817
2.01	Premium	G	SI2	16733
1.31	Premium	H	SI2	6089
1.27	Premium	J	VVS1	5761
2.00	Premium	H	SI1	11200
1.22	Premium	G	SI2	6969
0.50	Premium	H	VS1	1395
1.05	Premium	G	SI1	4974
0.31	Premium	G	SI2	523
0.51	Very Good	D	VS2	1668
1.10	Very Good	I	SI1	4640
1.00	Very Good	D	SI1	5755
2.01	Very Good	I	VS2	17422
0.38	Very Good	F	VS2	685
0.70	Very Good	F	SI1	2100
2.01	Very Good	H	SI2	12829
0.80	Very Good	G	VVS2	4002
0.82	Very Good	F	SI2	2643
0.50	Very Good	E	SI1	1374
1.27	Very Good	D	SI1	8312
0.90	Very Good	F	SI1	3950
0.30	Very Good	F	VVS1	682
0.90	Very Good	E	SI1	3748
1.06	Very Good	H	VS2	5783
2.01	Very Good	J	VS1	12845
1.01	Very Good	G	VVS2	6975
0.34	Very Good	E	SI1	596
0.43	Very Good	G	VVS1	1143
0.31	Very Good	D	VS2	734
1.30	Very Good	H	VS1	7747
0.51	Very Good	F	VS2	1569
1.52	Very Good	F	VS1	16670
0.41	Very Good	E	SI1	953
0.88	Very Good	H	VS2	3472
0.32	Very Good	F	VS2	645

Sort a dataset by column descending

Sort a number column “price”.

df_5<-df_1%>%arrange(desc(price))

carat	cut	color	clarity	price
2.01	Very Good	I	VS2	17422
2.01	Premium	G	SI2	16733
1.52	Very Good	F	VS1	16670
1.55	Premium	D	VS2	16137
1.33	Ideal	F	VVS2	15031
2.15	Ideal	I	SI2	14388
2.01	Very Good	J	VS1	12845
2.01	Very Good	H	SI2	12829
1.60	Premium	F	SI1	12343
2.00	Premium	H	SI1	11200
1.66	Premium	J	VVS2	9882
1.26	Ideal	G	VS1	9243
1.50	Good	D	SI2	9173
1.52	Fair	H	SI1	8818
1.27	Very Good	D	SI1	8312
1.30	Very Good	H	VS1	7747
1.20	Premium	E	SI1	7274
1.01	Very Good	G	VVS2	6975
1.22	Premium	G	SI2	6969
1.06	Ideal	H	VS2	6619
1.22	Ideal	F	SI1	6456
1.01	Good	F	VS2	6097
1.31	Premium	H	SI2	6089
1.16	Ideal	H	SI1	5852
1.30	Premium	H	VS2	5824
1.06	Premium	D	SI1	5817
1.06	Very Good	H	VS2	5783
1.27	Premium	J	VVS1	5761
1.00	Very Good	D	SI1	5755
1.31	Ideal	I	SI2	5546
1.09	Premium	H	SI1	5219
0.90	Ideal	H	VS1	5013
1.05	Premium	G	SI1	4974
1.10	Very Good	I	SI1	4640
1.17	Good	D	SI2	4639
0.90	Premium	G	VS1	4579
1.01	Premium	I	SI1	4525
1.03	Premium	I	SI1	4326
1.25	Premium	J	SI1	4200
0.80	Very Good	G	VVS2	4002
0.91	Ideal	G	SI2	3985
0.90	Very Good	F	SI1	3950
0.90	Very Good	E	SI1	3748
0.88	Very Good	H	VS2	3472
0.70	Ideal	G	VS1	3300
0.83	Good	E	SI1	3250
0.82	Very Good	F	SI2	2643
0.70	Ideal	H	SI1	2548
0.52	Premium	E	VVS2	2467
0.73	Ideal	I	VS1	2397
0.78	Ideal	F	SI2	2386
0.70	Very Good	F	SI1	2100
0.55	Ideal	G	VVS1	2042
0.70	Good	H	SI1	1771
0.52	Ideal	G	VS1	1721
0.51	Very Good	D	VS2	1668
0.42	Ideal	F	VVS1	1656
0.51	Very Good	F	VS2	1569
0.62	Ideal	F	SI2	1441
0.53	Ideal	H	VS2	1412
0.38	Ideal	D	VVS1	1400
0.50	Premium	H	VS1	1395
0.50	Very Good	E	SI1	1374
0.40	Ideal	F	VVS2	1351
0.33	Ideal	E	IF	1207
0.41	Ideal	E	VS1	1153
0.43	Very Good	G	VVS1	1143
0.35	Ideal	G	IF	1116
0.42	Premium	F	VS1	1103
0.40	Ideal	E	VS1	1053
0.30	Ideal	G	VVS1	1013
0.39	Ideal	F	VVS2	988
0.31	Ideal	E	IF	987
0.50	Good	J	VS2	965
0.41	Very Good	E	SI1	953
0.50	Ideal	J	VS2	875
0.31	Ideal	F	VVS1	840
0.34	Ideal	E	VS2	829
0.31	Ideal	G	VS1	802
0.30	Ideal	E	VVS2	766
0.32	Ideal	D	VS2	758
0.31	Ideal	D	VS2	734
0.31	Very Good	D	VS2	734
0.31	Ideal	D	VS1	713
0.31	Ideal	H	VVS1	707
0.31	Good	E	SI1	698
0.38	Very Good	F	VS2	685
0.41	Premium	H	SI1	683
0.30	Very Good	F	VVS1	682
0.40	Ideal	E	SI1	673
0.40	Ideal	J	VVS2	662
0.32	Very Good	F	VS2	645
0.34	Ideal	G	VS2	596
0.34	Very Good	E	SI1	596
0.30	Ideal	G	VS2	545
0.32	Ideal	H	VS2	534
0.33	Ideal	E	SI1	532
0.31	Premium	G	SI2	523
0.23	Good	F	VVS1	472
0.33	Ideal	I	SI2	403

Sort a string column “color”.

df_6<-df_1%>%arrange(desc(color))

carat	cut	color	clarity	price
1.25	Premium	J	SI1	4200
1.66	Premium	J	VVS2	9882
1.27	Premium	J	VVS1	5761
2.01	Very Good	J	VS1	12845
0.50	Ideal	J	VS2	875
0.50	Good	J	VS2	965
0.40	Ideal	J	VVS2	662
0.73	Ideal	I	VS1	2397
1.10	Very Good	I	SI1	4640
2.01	Very Good	I	VS2	17422
1.01	Premium	I	SI1	4525
1.03	Premium	I	SI1	4326
1.31	Ideal	I	SI2	5546
0.33	Ideal	I	SI2	403
2.15	Ideal	I	SI2	14388
0.31	Ideal	H	VVS1	707
0.70	Good	H	SI1	1771
2.01	Very Good	H	SI2	12829
0.41	Premium	H	SI1	683
1.30	Premium	H	VS2	5824
0.90	Ideal	H	VS1	5013
1.09	Premium	H	SI1	5219
0.32	Ideal	H	VS2	534
1.31	Premium	H	SI2	6089
1.06	Very Good	H	VS2	5783
2.00	Premium	H	SI1	11200
1.16	Ideal	H	SI1	5852
1.52	Fair	H	SI1	8818
0.50	Premium	H	VS1	1395
1.30	Very Good	H	VS1	7747
1.06	Ideal	H	VS2	6619
0.88	Very Good	H	VS2	3472
0.70	Ideal	H	SI1	2548
0.53	Ideal	H	VS2	1412
0.70	Ideal	G	VS1	3300
0.80	Very Good	G	VVS2	4002
0.35	Ideal	G	IF	1116
0.30	Ideal	G	VS2	545
0.91	Ideal	G	SI2	3985
0.90	Premium	G	VS1	4579
2.01	Premium	G	SI2	16733
0.34	Ideal	G	VS2	596
0.31	Ideal	G	VS1	802
1.01	Very Good	G	VVS2	6975
0.55	Ideal	G	VVS1	2042
0.43	Very Good	G	VVS1	1143
0.30	Ideal	G	VVS1	1013
1.22	Premium	G	SI2	6969
1.26	Ideal	G	VS1	9243
1.05	Premium	G	SI1	4974
0.52	Ideal	G	VS1	1721
0.31	Premium	G	SI2	523
1.01	Good	F	VS2	6097
1.60	Premium	F	SI1	12343
0.38	Very Good	F	VS2	685
0.70	Very Good	F	SI1	2100
0.82	Very Good	F	SI2	2643
0.62	Ideal	F	SI2	1441
0.40	Ideal	F	VVS2	1351
0.42	Premium	F	VS1	1103
0.90	Very Good	F	SI1	3950
0.42	Ideal	F	VVS1	1656
0.78	Ideal	F	SI2	2386
0.30	Very Good	F	VVS1	682
1.22	Ideal	F	SI1	6456
0.23	Good	F	VVS1	472
0.39	Ideal	F	VVS2	988
0.31	Ideal	F	VVS1	840
0.51	Very Good	F	VS2	1569
1.52	Very Good	F	VS1	16670
1.33	Ideal	F	VVS2	15031
0.32	Very Good	F	VS2	645
0.31	Ideal	E	IF	987
0.83	Good	E	SI1	3250
0.40	Ideal	E	VS1	1053
0.52	Premium	E	VVS2	2467
1.20	Premium	E	SI1	7274
0.31	Good	E	SI1	698
0.33	Ideal	E	IF	1207
0.40	Ideal	E	SI1	673
0.50	Very Good	E	SI1	1374
0.34	Ideal	E	VS2	829
0.90	Very Good	E	SI1	3748
0.33	Ideal	E	SI1	532
0.34	Very Good	E	SI1	596
0.30	Ideal	E	VVS2	766
0.41	Ideal	E	VS1	1153
0.41	Very Good	E	SI1	953
0.31	Ideal	D	VS1	713
0.51	Very Good	D	VS2	1668
0.32	Ideal	D	VS2	758
1.00	Very Good	D	SI1	5755
0.31	Ideal	D	VS2	734
1.17	Good	D	SI2	4639
1.27	Very Good	D	SI1	8312
1.55	Premium	D	VS2	16137
1.50	Good	D	SI2	9173
1.06	Premium	D	SI1	5817
0.38	Ideal	D	VVS1	1400
0.31	Very Good	D	VS2	734

Sort by several columns

Let’s sort by ascending “price” and descending “carat”.

df_7<-df_1%>%arrange(price,desc(carat))

carat	cut	color	clarity	price
0.33	Ideal	I	SI2	403
0.23	Good	F	VVS1	472
0.31	Premium	G	SI2	523
0.33	Ideal	E	SI1	532
0.32	Ideal	H	VS2	534
0.30	Ideal	G	VS2	545
0.34	Ideal	G	VS2	596
0.34	Very Good	E	SI1	596
0.32	Very Good	F	VS2	645
0.40	Ideal	J	VVS2	662
0.40	Ideal	E	SI1	673
0.30	Very Good	F	VVS1	682
0.41	Premium	H	SI1	683
0.38	Very Good	F	VS2	685
0.31	Good	E	SI1	698
0.31	Ideal	H	VVS1	707
0.31	Ideal	D	VS1	713
0.31	Ideal	D	VS2	734
0.31	Very Good	D	VS2	734
0.32	Ideal	D	VS2	758
0.30	Ideal	E	VVS2	766
0.31	Ideal	G	VS1	802
0.34	Ideal	E	VS2	829
0.31	Ideal	F	VVS1	840
0.50	Ideal	J	VS2	875
0.41	Very Good	E	SI1	953
0.50	Good	J	VS2	965
0.31	Ideal	E	IF	987
0.39	Ideal	F	VVS2	988
0.30	Ideal	G	VVS1	1013
0.40	Ideal	E	VS1	1053
0.42	Premium	F	VS1	1103
0.35	Ideal	G	IF	1116
0.43	Very Good	G	VVS1	1143
0.41	Ideal	E	VS1	1153
0.33	Ideal	E	IF	1207
0.40	Ideal	F	VVS2	1351
0.50	Very Good	E	SI1	1374
0.50	Premium	H	VS1	1395
0.38	Ideal	D	VVS1	1400
0.53	Ideal	H	VS2	1412
0.62	Ideal	F	SI2	1441
0.51	Very Good	F	VS2	1569
0.42	Ideal	F	VVS1	1656
0.51	Very Good	D	VS2	1668
0.52	Ideal	G	VS1	1721
0.70	Good	H	SI1	1771
0.55	Ideal	G	VVS1	2042
0.70	Very Good	F	SI1	2100
0.78	Ideal	F	SI2	2386
0.73	Ideal	I	VS1	2397
0.52	Premium	E	VVS2	2467
0.70	Ideal	H	SI1	2548
0.82	Very Good	F	SI2	2643
0.83	Good	E	SI1	3250
0.70	Ideal	G	VS1	3300
0.88	Very Good	H	VS2	3472
0.90	Very Good	E	SI1	3748
0.90	Very Good	F	SI1	3950
0.91	Ideal	G	SI2	3985
0.80	Very Good	G	VVS2	4002
1.25	Premium	J	SI1	4200
1.03	Premium	I	SI1	4326
1.01	Premium	I	SI1	4525
0.90	Premium	G	VS1	4579
1.17	Good	D	SI2	4639
1.10	Very Good	I	SI1	4640
1.05	Premium	G	SI1	4974
0.90	Ideal	H	VS1	5013
1.09	Premium	H	SI1	5219
1.31	Ideal	I	SI2	5546
1.00	Very Good	D	SI1	5755
1.27	Premium	J	VVS1	5761
1.06	Very Good	H	VS2	5783
1.06	Premium	D	SI1	5817
1.30	Premium	H	VS2	5824
1.16	Ideal	H	SI1	5852
1.31	Premium	H	SI2	6089
1.01	Good	F	VS2	6097
1.22	Ideal	F	SI1	6456
1.06	Ideal	H	VS2	6619
1.22	Premium	G	SI2	6969
1.01	Very Good	G	VVS2	6975
1.20	Premium	E	SI1	7274
1.30	Very Good	H	VS1	7747
1.27	Very Good	D	SI1	8312
1.52	Fair	H	SI1	8818
1.50	Good	D	SI2	9173
1.26	Ideal	G	VS1	9243
1.66	Premium	J	VVS2	9882
2.00	Premium	H	SI1	11200
1.60	Premium	F	SI1	12343
2.01	Very Good	H	SI2	12829
2.01	Very Good	J	VS1	12845
2.15	Ideal	I	SI2	14388
1.33	Ideal	F	VVS2	15031
1.55	Premium	D	VS2	16137
1.52	Very Good	F	VS1	16670
2.01	Premium	G	SI2	16733
2.01	Very Good	I	VS2	17422

v1 <- ggplot( data=df, aes(carat, price, colour=clarity)) +
    geom_point(alpha = 0.5, size = .75, position="jitter") +
    scale_colour_brewer(
        guide = guide_legend(title = NULL, reverse=T,
            override.aes = list(alpha = 1))) +
    theme_minimal()


girafe(ggobj = v1, width_svg = 1280/72, height_svg = 720/72, options =
list(opts_sizing(rescale = TRUE, width = 1.0)))

References

The citations and data sources used for this case

The data source was built in R. Use function data() in the console to view available datasets.

## [1] Wikipedia. _Diamond clarity_. Wikipedia, Apr. 2021. <URL:
## https://en.wikipedia.org/wiki/Diamond_clarity> (visited on 06/05/2021).